home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1997 February / Computer Life February 1997.iso / TELME / COMMS / ISDN1002.SRP < prev    next >
Text File  |  1996-06-04  |  2KB  |  99 lines
  1. rem Copyright (c) PhoneLink plc 
  2. rem Hayes MSTA (10/8/95)
  3.  
  4. label InitDevice
  5. echo off
  6. echo script[59]
  7. send    "at%a1=0%a2=6%a3=5%a4=0%a0=2%l2=0%l3=2char(13)" 
  8. timeout 2,modem_fail
  9. find    "OK"
  10. send    "at%l4=2%l15=0%b3=7%d3=7%d2=7%b2=7&k4s12=0char(13)" 
  11. timeout 2,modem_fail
  12. find    "OK"
  13. label OffToGate 
  14. echo off
  15. echo script[52]...
  16. send    "atdt{PreTel}{SiteTel}{PostFix}char(13)"
  17. timeout 10,connect_fail
  18. find    "CONNECT"
  19. label PadToGate
  20. echo off
  21. echo script[53]
  22. send    "atd {NUA}char(13)"
  23. timeout 3,nua_bad1
  24. finderr 0,CONNECT,nua_good
  25. find    "ZZZ"
  26. label nua_bad1
  27. echo script[58]
  28. send    "atd {NUA}char(13)"
  29. timeout 3,nua_bad2
  30. finderr 0,CONNECT,nua_good
  31. find    "ZZZ"
  32. label nua_bad2
  33. echo script[58]
  34. send    "atd {NUA}char(13)"
  35. timeout 3,nua_fail
  36. find    "CONNECT"
  37. label nua_good
  38. echo script[54].
  39. end
  40.  
  41. label GateToPad 
  42. echo off
  43. echo script[92]
  44. send "+++"
  45. timeout 5,command_mode_fail
  46. find "OK"
  47. send "athchar(13)"
  48. timeout 5,clear_fail
  49. find "OK"
  50. echo script[91]..
  51. end
  52.  
  53. label GateToOff
  54. rem Gate to Offline (also contains Pad to Offline)
  55. echo off
  56. echo script[92]
  57. send    "+++"
  58. timeout 5,command_mode_fail
  59. find    "OK"
  60. send    "athchar(13)"
  61. timeout 5,clear_fail
  62. find    "OK"
  63. label PadToOff
  64. echo off
  65. echo script[92]
  66. send "athchar(13)"
  67. timeout 5,hang_up_fail
  68. find "OK"
  69. echo script[99].
  70. end
  71.  
  72. label modem_offline
  73. dtrtoggle
  74. abort
  75.  
  76. label modem_fail
  77. echo script[23]
  78. abort
  79.  
  80. label connect_fail
  81. echo script[1]
  82. goto modem_offline
  83.  
  84. label nua_fail
  85. echo script[22]
  86. goto modem_offline
  87.  
  88. label command_mode_fail
  89. echo script[15]
  90. goto modem_offline
  91.  
  92. label clear_fail
  93. echo script[13]
  94. goto modem_offline
  95.  
  96. label hang_up_fail
  97. echo script[17]
  98. goto modem_offline
  99.